From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Fri, 27 May 2022 10:17:28 +0000 (+0200)
Subject: Make package-update-all also refresh the list
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~16^2~2349^2~394
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=fd4a0c022b7406b9d2a947937600e34e5cccb9bf;p=emacs.git

Make package-update-all also refresh the list

* lisp/emacs-lisp/package.el (package-update-all): Also refresh
package list.
---

diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index f4872a1a52f..b340848a6f9 100644
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -2168,10 +2168,11 @@ to install it but still mark it as selected."
 
 ;;;###autoload
 (defun package-update-all (&optional query)
-  "Upgrade all packages.
+  "Refresh package list and upgrade all packages.
 If QUERY, ask the user before updating packages.  When called
 interactively, QUERY is always true."
   (interactive (list (not noninteractive)))
+  (package-refresh-contents)
   (let ((updateable (package--updateable-packages)))
     (if (not updateable)
         (message "No packages to update")